home *** CD-ROM | disk | FTP | other *** search
/ Developer CD Series 1992 June: ROMin Holiday / ADC Developer CD (1992-06) (''ROMin Holiday'')_iso / Developer Connection - 06-1992.iso / Development Platforms / Apple II / Essentials / MPW IIGS Interfaces / PIIGSIncludes / QDAux.p < prev    next >
Encoding:
Text File  |  1990-04-05  |  3.3 KB  |  137 lines  |  [TEXT/MPS ]
  1. {********************************************
  2. ; File: QDAux.p
  3. ;
  4. ;
  5. ; Copyright Apple Computer, Inc. 1986-90
  6. ; All Rights Reserved
  7. ;
  8. ********************************************}
  9.  
  10. UNIT QDAUX;
  11. INTERFACE
  12. USES TYPES,QUICKDRAW;
  13. CONST
  14.  
  15.  
  16. {
  17.     PicInfo - The following picture
  18.     opcodes are for reference only!!
  19. }
  20.  
  21. frameVerb = $00;
  22. picNop = $00;
  23. drawCharVerb = $00;
  24. paintVerb = $01;
  25. picClipRgn = $01;
  26. drawTextVerb  = $01;
  27. eraseVerb = $02;
  28. picBkPat = $02;
  29. drawCStrVerb = $02;
  30. invertVerb = $03;
  31. picTxFont = $03;
  32. fillVerb = $04;
  33. picTxFace = $04;
  34. picTxMode = $05;
  35. picSpExtra = $06;
  36. picPnSize = $07;
  37. picPnMode = $08;
  38. picPnPat = $09;
  39. picThePat = $0A;
  40. picFillPat = $0A;  { Please use picThePat }
  41. picOvSize = $0B;
  42. picOrigin = $0C;
  43. picTxSize = $0D;
  44. picFGColor = $0E;
  45. picBGColor = $0F;
  46. picTxRatio = $10;
  47. picVersion = $11;
  48. picChExtra = $12;
  49. picPnMask = $13;
  50. picArcRot = $14;
  51. picFontFlags = $15;
  52. lineNoun = $20;
  53. picLine = $20;
  54. picLineFrom = $21;
  55. picShortL = $22;
  56. picShortLine = $22;
  57. picShortLFrom = $23;
  58. picLongText = $28;
  59. picDHText = $29;
  60. picDVText = $2A;
  61. picDVDHText = $2B;
  62. rectNoun = $30;
  63. rRectNoun = $40;
  64. ovalNoun = $50;
  65. arcNoun = $60;
  66. polyNoun = $70;
  67. rgnNoun = $80;
  68. mapNoun = $90;
  69. picBitsRect = $90;
  70. picBitsRgn = $91;
  71. picPBitsRect = $98;
  72. picPBitsRgn = $99;
  73. picShortComment = $A0;
  74. picLongComment = $A1;
  75. picEnd = $FF;
  76.  
  77. { SeedFill/CalcMask Masks }
  78. resMode640PMask = $00;
  79. resMode640DMask = $01;
  80. resMode320Mask = $02;
  81. destModeCopyMask = $0000;
  82. destModeLeaveMask = $1000;
  83. destModeOnesMask = $2000;
  84. destModeClrToZeros = $2000;
  85. destModeZerosMask = $3000;
  86. destModeClrToOnes = $3000;
  87.  
  88. { Error Codes }
  89. badRectSize = $1211;
  90. destModeError = $1212;
  91.  
  92. { Other Constants }
  93. fTextJust = $0008;
  94.  
  95. TYPE
  96. QDIconRecordHndl = ^QDIconRecordPtr;
  97. QDIconRecordPtr = ^QDIconRecord;
  98. QDIconRecord = RECORD
  99.     iconType : Integer;
  100.     iconSize : Integer;
  101.     iconHeight : Integer;
  102.     iconWidth : Integer;
  103.     iconImage : PACKED ARRAY[1..1] OF Byte;
  104.     iconMask : PACKED ARRAY[1..1] OF Byte;
  105. END;
  106. PicHndl = ^PicPtr;
  107. PicPtr = ^Picture;
  108. Picture = RECORD
  109.     picSCB : Integer;
  110.     picFrame : Rect;
  111.     pVersion : Integer; { Followed by picture opcodes  }
  112. END;
  113. LeakTablePtr = ^LeakTable;
  114. LeakTable = RECORD
  115.     leakCount : Integer;
  116.     leakColors : ARRAY[1..16] OF Integer;
  117. END;
  118. PROCEDURE CalcMask ( srcLocInfoPtr:LocInfo; srcRect:Rect; dstLocInfoPtr:LocInfo; dstRect:Rect; resMode:Integer; aPatternPtr:PatternPtr; leakTblPtr:LeakTable)  ;
  119. PROCEDURE ClosePicture   ;
  120. PROCEDURE CopyPixels ( srcLocPtr:LocInfo; destLocPtr:LocInfo; srcRect:Rect; destRect:Rect; xferMode:Integer; makeRgn:RegionHndl)  ;
  121. PROCEDURE DrawIcon ( iconPtr:QDIconRecord; displayMode:Integer; xPos:Integer; yPos:Integer)  ;
  122. PROCEDURE DrawPicture ( picHandle:PicHndl; destRect:Rect)  ;
  123. PROCEDURE KillPicture ( pichandle:PicHndl)  ;
  124. FUNCTION OpenPicture ( picFrame:Rect) : PicHndl ;
  125. PROCEDURE PicComment ( kind:Integer; dataSize:Integer; dataHandle:Handle)  ;
  126. PROCEDURE QDAuxBootInit   ;
  127. PROCEDURE QDAuxReset   ;
  128. PROCEDURE QDAuxShutDown   ;
  129. PROCEDURE QDAuxStartUp   ;
  130. FUNCTION QDAuxStatus  : Boolean ;
  131. FUNCTION QDAuxVersion  : Integer ;
  132. PROCEDURE SeedFill ( srcLocInfoPtr:LocInfo; srcRect:Rect; dstLocInfoPtr:LocInfo; dstRect:Rect; seedH:Integer; seedV:Integer; resMode:Integer; aPatternPtr:PatternPtr; leakTblPtr:LeakTable)  ;
  133. PROCEDURE SpecialRect ( rectPtr:Rect; frameColor:Integer; fillColor:Integer)  ;
  134. PROCEDURE WaitCursor   ;
  135. IMPLEMENTATION
  136. END.
  137.